precision measurement


type X z
type X y
integer n


z = 1
y = 1
n=1


while z = 1
	n=n+1
	y=y/10
	z = 1 + y


precision of data type X = n - 1
